home *** CD-ROM | disk | FTP | other *** search
/ Practical Algorithms for Image Analysis / Practical Algorithms for Image Analysis.iso / TARFILE.GZ / tarfile / ch_4.3 / xah / aoi_io.c < prev    next >
Encoding:
C/C++ Source or Header  |  1999-09-11  |  1.5 KB  |  75 lines
  1. /* 
  2.  * aoi_io.c
  3.  * 
  4.  * Practical Algorithms for Image Analysis
  5.  * 
  6.  * Copyright (c) 1997, 1998, 1999 MLMSoftwareGroup, LLC
  7.  */
  8.  
  9. /*
  10.  * AOI_IO.C
  11.  *
  12.  * routine to write aoi data to file
  13.  *
  14.  */
  15. #include "xah.h"
  16.  
  17. #define    SAR    "area"
  18. #define    SRD    "radius"
  19.  
  20. /* global */
  21. char *DTYPE;
  22.  
  23. /*
  24.  * write data to file
  25.  */
  26. void
  27. write_bub_data (FILE * fpOut, float foo, int np, struct bubble *cbub, int nd)
  28. {
  29.   int ip, id;
  30.  
  31.   fprintf (fpOut, "%d %d\n", nd, np);
  32.   for (ip = 0; ip < np; ip++)
  33.     fprintf (fpOut, "%f\n", foo);
  34.  
  35.   for (id = 0; id < nd; id++)
  36.     fprintf (fpOut, "%3d %3d %ld\n", (int) (cbub + id)->ctr.x,
  37.              (int) (cbub + id)->ctr.y, (long) (cbub + id)->area);
  38.  
  39. }
  40.  
  41.  
  42.  
  43. void
  44. write_aoi_data (FILE * fpOut, float foo, int np, struct Histo *h, int X_SQ)
  45. {
  46.   int ib, ip;
  47.  
  48.   fprintf (fpOut, "%d %d\n", h->nb, np);
  49.   for (ip = 0; ip < np; ip++)
  50.     fprintf (fpOut, "%f\n", foo);
  51.  
  52.   for (ib = 0; ib < h->nb; ib++)
  53.     fprintf (fpOut, "%f %f\n", (float) (ib + 1), h->ph[ib]);
  54.  
  55. /* 
  56.  * following entries not read by fitting routine 
  57.  */
  58.   fprintf (fpOut, "\n...stats:\n");
  59.   fprintf (fpOut, " no of domains: %d\n", h->nh);
  60.   fprintf (fpOut, " (raw) area mean, rmsq, skew: %lf %lf %lf\n",
  61.            h->mean, h->sdev, h->skew);
  62.  
  63.   if (X_SQ == 1)
  64.     DTYPE = SRD;
  65.   else
  66.     DTYPE = SAR;
  67.  
  68.   fprintf (fpOut, "  minimum %s: %f\n", DTYPE, h->amin);
  69.   fprintf (fpOut, "  maximum %s: %f\n", DTYPE, h->amax);
  70.   fprintf (fpOut, "%s_bin_width: %f\n", DTYPE, h->bw);
  71.   fprintf (fpOut, "   hist mean: %f\n", (float) h->hmean);
  72.   fprintf (fpOut, "binning method: %d\n", h->meth);
  73.  
  74. }
  75.